home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 65.zip / BS1 part 65 / Math Visin v2.1 disk 2.adf / DataTemplates / 2d_array_scaled < prev    next >
Text File  |  1992-02-14  |  889b  |  34 lines
  1. ! 2d_Array_Scaled     two dimensional array with count and scaling at top
  2. !
  3. !-------------------------------- Prototype of data file --------------------
  4. ! rows    low_limit high_limit
  5. ! columns low_limit high_limit
  6. ! data data data data data
  7. ! data data data data data
  8. !-------------------------------- Example of data file -----------------------
  9. ! 2  .4 .8    ! 2 elements, scaled from .4 to .8 
  10. ! 3  3.1 3.2  ! 3 elements, scaled from 3.1 to 3.2
  11. ! 4.3 3.4 5.6 ! actual data
  12. ! 1.2 6.7 4.2
  13. !--------------------------------
  14.  
  15. Define Rows Integer
  16. Define Columns Integer
  17. Define FirstLow Real
  18. Define FirstHigh Real
  19. Define SecondLow Real
  20. Define SecondHigh Real
  21.  
  22. Read Rows FirstLow FirstHigh
  23. Read Columns SecondLow SecondHigh
  24.  
  25. BeginStructure
  26.   DefArray Rows FirstLow FirstHigh
  27.     DefArray Columns SecondLow SecondHigh
  28.       DefDataType IEEE8
  29.     EndArray
  30.   EndArray
  31. EndStructure
  32.  
  33. RecurseRead
  34.